WimpSlot -min 128k -max 128k
RMEnsure MessageTrans 0.00 RMLoad System:Modules.MsgTrans
RMEnsure MessageTrans 0.00 Error You need MessageTrans 0.00 or later

Set Trynth$Dir <Obey$Dir>
IconSprites <Obey$Dir>.!Sprites
if "<TrynthRes$Path>" = "" then Run <Trynth$Dir>.Resources.ResFind Trynth

| A file type for saved games...
Set File$Type_099 Trynth

Set myRiscOS3 1
RMEnsure UtilityModule 3.00 Set myRiscOS3 0

| The next line starts the Trynth Diagnosis task window.
| a bit of a surprise.
| Comment it out if you don't if Pipe, & TaskWindow module,
| or don't want it, and the performance waste.
| Note also change beginning of !RunImage.
|if myRiscOS3 = 1 then WimpTask TaskWindow "Print Pipe::diagnosis.9" -wimpslot 32k -name "Trynth Diagnosis" -quit

UnSet myRiscOS3

WimpSlot -min 228K -max 228K
Run <Obey$Dir>.!RunImage